C++ für Kids/C++ for kids.iso/SETUP/US/CBUILDER/DATA.Z/MDREP.DFM/MDREP.txt

Text File | 1997-02-13 | 16KB | 718 lines

object MDForm: TMDForm
  Left = 171
  Top = 177
  Width = 745
  Height = 530
  HorzScrollBar.Range = 1200
  VertScrollBar.Range = 2000
  AutoScroll = False
  Caption = 'Master Detail demo Report'
  Font.Charset = ANSI_CHARSET
  Font.Color = clBlack
  Font.Height = -13
  Font.Name = 'Arial'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 16
  object Orderlines: TQRBand
    Left = 0
    Top = 117
    Width = 1200
    Height = 19
    Align = alTop
    BandType = rbSubDetail
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    LinkBand = OrderSummary
    Ruler = qrrNone
    object QRDBText8: TQRDBText
      Left = 112
      Top = 0
      Width = 229
      Height = 17
      AlignToBand = False
      DataSource = DataModule2.LineItemSource
      DataField = 'PartName'
    end
    object QRDBText12: TQRDBText
      Left = 32
      Top = 0
      Width = 69
      Height = 17
      AlignToBand = False
      DataSource = DataModule2.LineItemSource
      DataField = 'PartNo'
    end
    object QRDBText13: TQRDBText
      Left = 348
      Top = 0
      Width = 89
      Height = 17
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DataModule2.LineItemSource
      DataField = 'Price'
    end
    object QRDBText14: TQRDBText
      Left = 444
      Top = 0
      Width = 33
      Height = 17
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DataModule2.LineItemSource
      DataField = 'Qty'
    end
    object QRDBText16: TQRDBText
      Left = 492
      Top = 0
      Width = 81
      Height = 17
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DataModule2.LineItemSource
      DataField = 'Total'
    end
  end
  object Title: TQRBand
    Left = 0
    Top = 0
    Width = 1200
    Height = 45
    Align = alTop
    BandType = rbTitle
    Color = clWhite
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = []
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    ParentFont = False
    Ruler = qrrInchesHV
    object QRLabel15: TQRLabel
      Left = 84
      Top = 4
      Width = 193
      Height = 36
      Caption = 'QuickReport'
      AlignToBand = False
      Font.Charset = ANSI_CHARSET
      Font.Color = 8404992
      Font.Height = -32
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object Image1: TImage
      Left = 8
      Top = 4
      Width = 69
      Height = 33
      Picture.Data = {<image000.bmp>}
      Stretch = True
    end
    object QRLabel1: TQRLabel
      Left = 288
      Top = 20
      Width = 99
      Height = 16
      Caption = 'for C++ Builder '
      AlignToBand = False
      Font.Charset = ANSI_CHARSET
      Font.Color = 8404992
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object QRLabel16: TQRLabel
      Left = 560
      Top = 20
      Width = 167
      Height = 16
      Caption = 'Copyright (c) 1996 QSD AS'
      AlignToBand = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
  end
  object CustomerHeading: TQRBand
    Left = 0
    Top = 45
    Width = 1200
    Height = 36
    Align = alTop
    BandType = rbDetail
    Color = 8404992
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    LinkBand = Detail
    Ruler = qrrNone
    object QRDBText1: TQRDBText
      Left = 8
      Top = 12
      Width = 245
      Height = 17
      AlignToBand = False
      DataSource = DataModule2.CustomerSource
      DataField = 'Company'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object QRLabel3: TQRLabel
      Left = 8
      Top = 0
      Width = 46
      Height = 14
      Caption = 'Customer'
      AlignToBand = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object QRLabel4: TQRLabel
      Left = 272
      Top = 0
      Width = 30
      Height = 14
      Alignment = taRightJustify
      Caption = 'Phone'
      AlignToBand = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object QRDBText3: TQRDBText
      Left = 272
      Top = 12
      Width = 109
      Height = 17
      AlignToBand = False
      DataSource = DataModule2.CustomerSource
      DataField = 'Phone'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object QRDBText4: TQRDBText
      Left = 64
      Top = 0
      Width = 25
      Height = 13
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DataModule2.CustomerSource
      DataField = 'CustNo'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object QRLabel5: TQRLabel
      Left = 388
      Top = 0
      Width = 18
      Height = 14
      Caption = 'Fax'
      AlignToBand = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object QRDBText5: TQRDBText
      Left = 388
      Top = 12
      Width = 105
      Height = 17
      AlignToBand = False
      DataSource = DataModule2.CustomerSource
      DataField = 'Fax'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWhite
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
  end
  object CustomerFooter: TQRBand
    Left = 0
    Top = 173
    Width = 1200
    Height = 32
    Align = alTop
    BandType = rbGroupFooter
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrNone
    object QRDBCalc1: TQRDBCalc
      Left = 484
      Top = 0
      Width = 89
      Height = 17
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DataModule2.OrderSource
      DataField = 'AmountPaid'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Operation = qrcSUM
      PrintMask = '#,##0.00'
      ResetBand = CustomerFooter
    end
    object QRLabel7: TQRLabel
      Left = 304
      Top = 0
      Width = 164
      Height = 16
      Caption = 'Total sales this customer: '
      AlignToBand = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object PageFooter: TQRBand
    Left = 0
    Top = 301
    Width = 1200
    Height = 19
    Align = alTop
    BandType = rbPageFooter
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrNone
    object QRSysData1: TQRSysData
      Left = 664
      Top = 0
      Width = 79
      Height = 16
      Alignment = taRightJustify
      AlignToBand = True
      Data = qrsPageNumber
      Text = 'Page '
    end
  end
  object Summary: TQRBand
    Left = 0
    Top = 205
    Width = 1200